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FIG. 9A 

/* Includes required 
ttinclude <GL/gl.h> 
#include <GL/glut.h> 
# include <stdio . h> 
#include <ppm.h> 
#include <math.h> 

f -k -k 

* something because of windows 

void eprintf () { 

} 

f -k 

* our data structure of choice 

typedef struct obj { 

other parameters */ 
float matrix[16]; 

/* view angle */ 
float viewangle; 

/* aspect ratio */ 
float aspect; 

z of the camera */ 
float tz; 

/* ry of the camera 
float ry; 
} Obj; 

/* hold the display lists for textures 
typedef struct texture { 

int texl; 

int tex2; 
} Texture; 

/ -k -k 

* our global variables 
*/ 

camera settings */ 
Obj scene; 
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/* texture stuff */ 
Texture def; 

Texture* current__texture = &def; 

/■^ track the next display list number */ 
int nextDLnum = 2; 

/* stuff for lighting */ 

float lightPos[4] = {2.0, 4.0, 2.0, 0}; 
float lightDir[4] = {0, 0, 1.0, 1.0}; 
float lightAmb[4] = {0.4, 0.4, 0.4, 1.0}; 
float lightDiff[4] - {0.8, 0.8, 0.8, 1.0}; 
float lightSpec[4] = {0.8, 0.8, 0.8, 1.0}; 
int lights = 0; 
int outsideView = 0; 
int parent; 



ttdefine HEMISPHERE 1 

void createHemisphere (int listNum, int numPts, int geom) ; 
/ -k -k 

* Read in the ppm files and create display lists for a texture 

* returns the dimension of the image 
*/ 

pixel **mapl, ■^*map2; 

GLubyte *texl, *tex2, **tmpPP, *tmpP; 

void readTexture (Texture* t, char* filel, char* file2) { 
FILE *fpl, *fp2; 
int cols, rows, i, j, index; 
pixval maxval; 

/* open the files */ 
fpl = fopen (filel, "r"); 
fp2 = fopen (file2, "r") ; 
if (!fpl) { 

fprintf (stderr, "Couldn't open %s\n", filel); 

} 

if (!fp2) { 

fprintf (stderr, "Couldn't open %s\n", file2); 

} 

/* read the ppm files */ 

mapl = ppm_readppm{fpl, &cols, &rows, &maxval) ; 

fprintf (stderr, "%s: rows = %d \t cols = %d\n", filel, rows, 

cols , maxval ) ; 

map2 ppm_readppm ( f p2 , &cols, &rows, &maxval); 
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fprintf (stderr, "%s: rows = %d \t cols = %d\n", file2, rows, 
cols, maxval) ; 



/* convert them 

texl = malloc (sizeof (GLubyte) * rows * cols * 3); 
tex2 = malloc (sizeof (GLubyte) * rows * cols * 3); 
index = 0; 

for (i 0; i < rows; i++) { 
for (j = 0; j < cols; j++) { 
R */ 
texl [index] 
tex2 [ index] 
index ++; 

G */ 
texl [index] 
tex2 [index] 
index ++; 

B */ 
texl [index] 
tex2 [index] 
index ++; 

} 

} 



PPM_GETR (mapl [i] [j] 
PPM GETR (map2 [i] [ j ] 



PPM^GETG (mapl [ i ] [ j ] 
PPM GETG (map2 [i] [ j ] 



PPM_GETB (mapl [i] [j] 
PPM GETB (map2 [i] [ j ] 



create the textures */ 

new display list^/ 
glNewList (nextDLnum, GL_COMPILE) ; 
t->texl = nextDLnum; 
nextDLnum++; 

glTexImage2D (GL_TEXTURE_2D, 0, 3, cols, rows, 0, GL_RGB, 
GL_UNSIGNED_BYTE, 

texl ) ; 
glEndList ( ) ; 



/* new display list^/ 

glNewList (nextDLnum, GL_COMPILE) ; 

t->tex2 - nextDLnum; 

nextDLnum++; 

glTexImage2D (GL_TEXTURE_2D, 0, 3, cols, rows, 0, GL_RGB, 
GL_UNSIGNED_BYTE' 

tex2) ; 
glEndList ( ) ; 
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/ ★ * 

* this will initialize the display lists for the objects 
*/ 

void initialize_objects (int argc, char**argv) { 
float tmp [4 ] ; 

/* read in the texture */ 
readTexture (&def , argv[l] , argv[2] ) ; 

/* create hemisphere */ 

createHemisphere (1, 50, GL_TRI ANGLE_STRI P ) ; 

scene */ 
scene . viewangle = 130; 
scene. tz = 0; 
scene. ry = 0; 

} 



* Clear the screen, draw the objects 
*/ 

void display ( ) 
{ 

float tmp [ 4 ] ; 
float height; 

clear the screen 
glClear (GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT ) ; 

/* adjust for scene orientation 
glMatrixMode ( GL_PRO JECTION ) ; 
if (outsideView) { 
glLoadldentity ( ) ; 

gluPerspective ( 45, scene . aspect , 0,1, 10.0); 
glTranslatef (0, 0, -3); 
glRota.tef (45, 1, 0, 0); 
glRotatef (45, 0, 1, 0); 
glDisable (GL_TEXTURE_2D) ; 
glColor3f ( .8, .8, .8) ; 
} else { 
glLoadldentity ( ) ; 

gluPerspective (scene . viewangle, scene. aspect, 0.1, 10.0) 
glTranslatef (0, 0, scene. tz); 
glRotatef ( scene . ry, 0, 1, 0); 

} 
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/* draw our models */ 
glMatrixMode (GL_MODELVIEW) ; 
glPushMatrix ( ) ; 

if (outsideView) { 
/* transform to where the camera would be */ 
glPushMatrix ( ) ; 

draw a cube for the camera */ 
glLoadldentity ( ) ; 
glRotatef (180, 1, 0, 0); 
glTranslatef (0, 0, scene. tz) ; 
tmp[0] = tmp[l] = tmp[2] = .8; 
tmp[3] = 1; 

glMaterialfv (GL_FRONT_AND_BACK, GL_SPECULAR, tmp) ; 
glMaterialf (GL_FRONT_AND__BACK, GL_SHININESS , 0.0) ; 
glMaterialfv (GL_FRONT_AND_BACK, GL_AMBIENT_AND_DI FFUSE , tmp) 
glutSolidCube ( - 1 ) ; 

/* draw a cone for the view frustrum */ 

glLoadldentity ( ) ; 

height = 1 - scene. tz; 

glRotatef (45, 0, 0, 1); 

glTranslatef (0, 0, -1); 

tmp[0] = tmp[l] = 1; 

tmp [2] = 0; 

tmp [ 3 ] = . 3 ; 

glMaterialfv (GL_FRONT_AND_BACK, GL_SPECULAR, tmp) ; 
glMaterialf (GL_FRONT_AND_BACK, GL_SHININESS , 0.0) ; 
glMaterialfv (GL_FRONT_AND_BACK, GL_AMBIENT_AND_DI FFUSE , tmp) 
glutSolidCone (tan (scene . viewangle ^ 3.14 / 360.0) * height, 
height, 20, 1) ; 

glPopMatrix ( ) ; . 

glEnable (GL_TEXTURE_2D) ; 

} 

now draw the semisphere */ 
if (lights) { 
tmp[0] = tmp[l] = tmp [2] = .8; 
tmp [ 3 ] = . 8 ; 

glMaterialfv (GL_FRONT_AND_BACK, GL_SPECULAR, tmp) ; 
glMaterialf (GL_FRONT_AND_BACK, GL_SHININESS , 10.0) ; 
glMaterialfv (GL_FRONT_AND_BACK, GL__AMBIENT_AND_DI FFUSE , tmp) 

} 

glCallList ( current_texture->texl ) ; 
glCallList (HEMISPHERE) ; 
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if (lights) { 
tmp[0] = tmp[l] = tmp[2] = .5; 
tmp [ 3 ] = . 5 ; 

glMaterialfv (GL_FRONT_AND_BACK, GL_SPECULAR, tmp) ; 
glMaterialf (GL_FRONT_AND_BACK, GL_SHININESS , 10.0); 
glMaterialfv (GL_FRONT_AND_BACK, GL_AMBIENT_AND_DI FFUSE , tmp) 

} 

glRotatef (180 . 0, 0.0, 0.0, 1.0); 
glCallList (current_texture->tex2 ) ; 
glCallList (HEMISPHERE) ; 
glPopMatrix ( ) ; 

fprintf (stderr, "%s\n", gluErrorString (glGetError ( ) ) ) ; 
glutSwapBuf f ers ( ) ; 

} 

/* 

* Handle Menus 

#define M_QUIT 1 

void Select (int value) 

{ 

switch (value) { 
case M_QUIT: 

exit (0) ; 

break; 

} 

glut PostRedisplay { ) ; 

} 

void create_menu ( ) { 

fprintf ( stderr> "Press ? for help\n"); 
glutCreateMenu (Select) ; 
glutAddMenuEntry ("Quit", M_QUIT) ; 
glutAttachMenu (GLUT_RIGHT_BUTTON) ; 

} 

/* Initializes hading model */ 

void mylnit(void) 

{ 

glEnable (GL_DEPTH_TEST ) ; 
glShadeModel (GL_SMOOTH) ; 

/* texture stuff */ 

glPixelStorei (GL_UNPACK_ALIGNMENT , sizeof (GLubyte) ) ; 
glTexParameterf (GL_TEXTURE_2D, GL_TEXTURE_WRAP_S , GL_CLAMP) ; 
glTexParameterf (GL_TEXTURE_2D, GL_TEXTURE_WRAP_T, GL_CLAMP) ; 
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glTexParameterf (GL_TEXTURE_2D, GL_TEXTURE_iyiAG_FILTER, 
GL_NEAREST) ; 

glTexParameterf (GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, 
GL_NEAREST) ; 

glTexEnvf (GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE , GL_DECAL) ; 
glEnabie (GL_TEXTURE_2D) ; 

} 

* Called when the window is first opened and whenever 

* the window is reconfigured (moved or resized) . 
*/ 

void myReshape ( int w, int h) 
{ 

glViewport (0, 0, w, h) ; define the viewport */ 

scene. aspect = 1 . 0* (GLf loat ) w/ (GLf loat ) h; 
glMatrixMode (GL_PROJECTION) ; 
glLoadldentity ( ) ; 

gluPerspective ( scene . viewangle , scene . aspect , 0.1, 10.0); 
glMultMatrixf (scene .matrix) ; 

glMatrixMode (GL_MODELVIEW) ; /* back to modelview 

matriix */ 

} 

* Keyboard handler 
void 

Key (unsigned char key, int x, int y) 
{ 

float matrix[16]; 
glMatrixMode (GL_MODELVIEW) ; 

glGetFloatv (GL_MODELVIEW_MATRIX, matrix) ; 
glLoadldentity ( ) ; 

fprintf (stderr, "%d - %c key, key) ; 

switch (key) { 
case ' o ' : 
if ( ! outsideView) { 

fprintf (stderr , "outside on "); 
outsideView = 1; 

/* turn on blending 
glEnable (GL_BLEND) ; 

glBlendFunc (GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA) ; 
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/* We want to see color 

glTexEnvf ( GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE , GL_MODULATE) 

/* turn on our spotlight */ 
glEnable (GL_LIGHT1) ; 

glLightfv (GL_LIGHT1, GL_AiyiBIENT , lightAmb) ; 
glLightfv (GL_LIGHT1, GL_DIFFUSE, lightDiff ) ; 
glLightfv (GL_LIGHT1, GL_SPECULAR, lightSpec) ; 
glLightfv (GL_LIGHT1, GL_SPOT_DIRECTION, lightDir) ; 
} else { 

fprintf (stderr, "outside off "); 
outsideView = 0; 

glTexEnvf ( GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE , GL_DECAL ) ; 
glDisable (GL_BLEND) ; 

} 

break; 
case ' F ' : 

fprintf (stderr, "flat ") ; 

glShadeModel (GL_FLAT) ; 

breaks- 
case ' f ' : 

fprintf ( stderr, "smooth "); 

glShadeModel (GL_SMOOTH) ; 

break; 
case ' y ' : 

printf{"ry = %f\n", scene. ry); 

scene. ry -= 5; 

break; 
case ' Y' : 

scene . ry += 5 ; 

break; 
case ' z ' : 

scene . t z -= . 02 ; 

fprintf (stderr, " tz = %f scene. tz); 

break; 
case ' Z * : 
scene . tz += . 02 ; 

fprintf (stderr, " tz = %f ", scene. tz); 
break; 
case ' a ' : 
scene . viewangle -= 1; 

fprintf ( stderr , " angle: %f scene . viewangle ) ; 
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breaks- 
case 'A' : 
scene . viewangle += 1; 

fprintf (stderr, "angle: %f scene . viewangle ) ; 

break; 
case 55: 

glRotatef (-5, 0.0, 0.0, 1.0); 

break; 
case 57 : 

glRotatef(5, 0.0, 0.0, 1.0); 

break; 
case 52 : 

glRotatef (-5, 0.0, 1.0, 0.0); 

break; 
case 54 : 

glRotatef(5, 0.0, 1.0, 0.0); 

break; 
case 56: 

glRotatef(5, 1.0, 0.0, 0.0); 

break; 
case 50 : 

glRotatef (-5, 1.0, 0.0, 0.0); 

break; 
case ' q ' : 

if (lights) { 

glDisable (GL_LIGHTO) ; 
glDisable (GL_LIGHTING) ; 
lights = 0; 

fprintf (stderr , "no lights "); 
} else { 

glEnable (GL_LIGHTING ) ; 
glEnable (GL_LIGHTO) ; 

glLightfv (GL_LIGHTO, GL_POSITION, lightPos) ; 
glLightf V (GL_LIGHTO, GL_AMBIENT, lightAmb) ; 
glLightfv (GL_LIGHTO, GL_DIFFUSE, lightDiff ) ; 
glLightfv (GL_LIGHTO, GL_SPECULAR, lightSpec) ; 
lights = 1; 

fprintf (stderr, "lights "); 

} 

break; 
case ' t ' : 

fprintf (stderr, "texture off "); 

glDisable (GL__TEXTURE_2D) ; 

break; 
case ' T ' : 

fprintf (stderr , "texture on "); 

glEnable (GL_TEXTURE_2D) ; 

break; 



case ' ? * : 
fprintf (stderr , 
f printf (stderr , 
scene\n" ) ; 

fprintf (stderr , 
fprintf (stderr, 
fprintf (stderr , 
fprintf (stderr , 
breaks- 
case 27 : 

exit (1) ; 
breaks- 
default : 
fprintf (stderr , 
break; 

} 
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•hjkl - rotate current objectXn"); 

's/S - shrink / grow the object or zoom the 

•a/A viewangleXn" ) ; 
'z/Z camera positionXn" ) ; 
'f/F flat smoothXn"); 
•Escape quits Xn"); 

/* Esc will quit ^/ 



•Unbound key - %d 



key) 



fprintf (stderr, •'Xn*') ; 
glMultMatrixf (matrix) ; 
glutPostRedisplay 0 ; 



'/ 



Main Loop 

Open window with initial window size, title bar, 
RGBA display mode, and handle input events. 



int main(int argc, char** argv) 
{ 

glutlnit ( &argc, argv) ; 

glutlnitDisplayMode (GLUT_DOUBLE | GLUT_ 
parent = glutCreateWindow (argv[0]); 
mylnit ( ) ; 

glutKeyboardFunc (Key ) ; 
glutReshapeFunc (myReshape) ; 
glutDisplayFunc (display) ; 
create_menu ( ) ; 

initialize_objects (argc, argv) ; 
glutMainLoop ( ) ; 



RGBA) 
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#ifdef WINDOWS 
#include <windows . h> 
#endif 

#include <GL/gl.h> 
#include <GL/glut.h> 

# include "warp • h" 
# include <stdio . h> 
/ ★ ★ 

* Triangulate a hemisphere and texture coordinates. 

* listNum - display list number 

* numPts - number of points to a side 

* return the display list 

void createHemisphere (int listNum, int numPts, int geom) { 
double incr = 1.0 / numPts; 
double u, V, x, y, z; 
float tx, tz; 
int i, j; 

/* start the display list */ 

glNewList (listNum, GL_COMPILE_AND_EXECUTE ) ; 

/* create the coordinates */ 

use the square to circle map 
/* across then down 
V = 0; 

for (j = 0; j < numPts ; j++) { 
/* start the tri strip */ 
glBegin (geom) ; 
u = 0; 

for (i = 0; i <= numPts; i++) { 
/* do the top point 

get the XYZ coords */ 
map (u, V, &x, &y, &z); 

create the texture coord */ 
tx = X / 2 + .5; 
tz-z/2+.5; 

if (tx > 1.0 II tz > 1.0 M tx < 0.0 M tz < 0.0) { 
printf("not in range %f %f\n", tx, tz) ; 

} 

glTexCoord2f (tx, tz) ; 
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/* normal • */ 
glNormal3f (x, y, z); 

/* create the coord */ 
glVertex3f (x, y, z); 

/* get the XYZ coords */ 
map(u, V + incr, &x, &y, &z); 

/* create the texture coord 
tx = X / 2 + .5; 
tz = z / 2 + .5; 

if (tx > 1.0 II tz > 1.0 II tx < 0.0 I I tz < 0.0) { 
printf("not in range %f %f\n", tx, tz); 

} 

glTexCoord2f (tx, tz) ; 

/* normal */ 
glNormal3f (x, y, z); 

create the coord ^/ 
glVertexBf (x, y, z); 

adjust u */ 
u += incr; 

} 

done with the list 
glEnd ( ) ; 

/* adjust V 
V += incr; 

} 

all done with the list */ 
glEndList ( ) ; 



